Top 10k strings from Spectrum Basic Programming Course (1984)(Honeyfold Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
11 ;" <ENTER>"
10 "RUN <ENTER>":
8 "To run this,type:"
7 ;"<ENTER>"
4 "PRESS ANY KEY TO VIEW NEXT PAGE"
4 "Item not known.":
4 " ";
3 rinc=rinc*-1
3 lives=lives-1
3 ;"**HIT ANY KEY**"
3 "To run this type:"
2 x(nn)=x(nn)-100
2 x(nn)=x(nn)+100
2 x(m)=x(m)-1
2 t$=q$(i)(1
2 search through vocab.
2 readers to implement sound sequences
2 readers to implement "score routine".
2 p(i),q(i);"
2 n$=v$(n)(1
2 n$=c$(space+1
2 d$="nsewud":
2 cinc=cinc*-1
2 best=score
2 ar=ar+arinc
2 ac=ac+acinc
2 a$="--------":
2 a$;a$;a$;a$
2 MOVING THE BALL
2 INITIALISATION ROUTINE
2 ;d$(l);" ";
2 ;"loader";
2 ;"interpreter";
2 ;"Z = left":
2 ;"LOCATION":
2 ;"HIT ANY KEY FOR A NEW GAME"
2 ;">> ";c$;" <<":
2 ;"13.SPACEWAR"
2 ;" ITEMS "
2 ;" EXITS ":
2 ((totang-.5
2 "item not here.":
2 "Your command? ";c$:
2 "You have:"
2 "You don't have it.":
2 "You can't carry any more.":
2 "You are dead.":
2 "RUN <ENTER>"
2 "OK, item dropped."
2 "OK - game over.":
2 "Nothing.":
2 "No such item.":
2 "Item may not be moved.":
2 "I don't understand."
2 "I don't know how to do that.":
2 "I can't do that yet.":
2 "Game ended.":
2 "Create and RUN an adventure"
2 "Can't go that way.":
2 T P Mervyn & D S Neilson 1982
1 z$=" next "
1 z$=" first "
1 yhit=p(i):
1 yhit,xhit;"* ":
1 yhit,xhit;" "
1 xhit=q(i):
1 x(k)=count+100
1 wall
1 w$=" ":
1 vert=vert-1
1 vert=vert+7
1 vert=vert+1
1 user defined graphics
1 update=6000
1 umbercorrec
1 turn=turn+1
1 totang=totang+a(k)
1 total=total+vc
1 time=time+5
1 time=(end-start)/50
1 this version is different from the book to allow you to use both the tape and book independently.
1 the loader with a:
1 the interpreter program with a:":
1 spacewar `
1 scoutcraft
1 score=score+value
1 score=score+time
1 score=score+50
1 score=score+10000
1 score=score+1
1 score=120000
1 score=1000
1 score<best
1 score2=score2+1
1 score1=score1+1
1 scalefactor=200
1 row,col;"**":
1 row,col;" ":
1 reaction
1 q(i)=q(i)-1
1 piechart
1 p1,p2;"*":
1 p1,p2;" ":
1 p(i),q(i);" "
1 number correct=number correct+1
1 number correct=0
1 notcakhaidoo chekeychetrereaeatpicmovopequigamlooarotakinvloc
1 not on 16k machines. Use SAVE b$ LINE
1 music
1 movealiens=5000
1 movealiens
1 messages here
1 loader _
1 keyscan=2000
1 intro
1 interpret '
1 initial=1000
1 initial routine
1 i;" of ";number
1 hittest=8800
1 hangman G
1 game loader
1 flagset=8000
1 finish=9500
1 find scale factor. Assume largest bar 200 pixels across.
1 find maximum value so barchart may be scaled.
1 f$=x$+a$+"("+y$+b$+z$+")"
1 f$="("+x$+a$+y$+")"+b$+z$:
1 explode=1500
1 explain=6500
1 etcha
1 dis=(q(i)-2
1 dis=(bp2-2
1 d(x),p(x):
1 compute angle sizes andreturn in array a.
1 colltest=8200
1 c$(number,10
1 br=br+brinc
1 bp1,bp2;" "
1 bodmas f
1 blockade2
1 blockade g
1 best=1000000
1 bc=bc+bcinc
1 barchart
1 balltrap &
1 ball=ball+1
1 answer=correct
1 adventure
1 a(k)=a(k)*360
1 Wood Mine entrance Mine shaft Mine face
1 With a 48K machine, this may be merged with the interp-reter.
1 USER GRAPHICS
1 Treasure
1 THE BALL IN THE TRAP
1 REACTION TESTER
1 Print category on bar.
1 Open door
1 Open chest
1 Note
1 NEWBALL SERVED
1 MOVING THE BAT
1 Locked door
1 Locked chest
1 Input stage.
1 Hairpin
1 Golden key
1 FINAL VERSION
1 Draw each bar routine.
1 DRAWING THE TRAP
1 DRAWING THE LINES
1 DR.WATSON
1 Created with Ramsoft MakeTZX
1 Cake
1 ;time;"SECONDS"
1 ;flag1;flag2;flag3;flag4
1 ;"you have 10 goes":
1 ;"the total score after 10 attempts"
1 ;"spacewar";
1 ;"sorry that's your lot!"
1 ;"sorry that letter":
1 ;"see how long you can last"
1 ;"reaction";
1 ;"reaction tester rules"
1 ;"press any key to start":
1 ;"press P to start":
1 ;"press P to start each time":
1 ;"press P to re-start"
1 ;"press 'n' to move left"
1 ;"press 'm' to move right"
1 ;"press '8' to move right"
1 ;"press '7' to move up"
1 ;"press '6' to move down"
1 ;"press '5' to move left"
1 ;"player 2"
1 ;"player 1":
1 ;"piechart";
1 ;"ownprog(48K)";
1 ;"ownprog(16K)";
1 ;"movement"
1 ;"key controls"
1 ;"is not in the word"
1 ;"is added together and compared with the current best score"
1 ;"instructions"
1 ;"has ";l;" letters"
1 ;"hangman";
1 ;"do you want another go? "
1 ;"bodmas";
1 ;"blockade2";
1 ;"blockade-2"
1 ;"blockade";
1 ;"blockade"
1 ;"barchart";
1 ;"balltrap";
1 ;"adventure";
1 ;"___________":
1 ;"Your word:";w$:
1 ;"Your score ";score
1 ;"You've already tried that letter"
1 ;"X =right":
1 ;"X = right":
1 ;"What is your";z$;"guess? ":
1 ;"Well done, you've guessed the":
1 ;"Welcome To:":
1 ;"Type in number for more details"
1 ;"The object of this game is to bounce the ball into the net using the wall which you build with the keys shown below:"
1 ;"Standfast House,"
1 ;"Space War Game":
1 ;"SCORE:";score
1 ;"Ready tape - enter any value."3
1 ;"REACTION TIME:";
1 ;"Q = up":
1 ;"Please Wait While the intro Program is loaded."
1 ;"Off you go then,press any key."
1 ;"OUT OF TIME!"
1 ;"O = up":
1 ;"Note not found":
1 ;"NEW BEST TIME":
1 ;"NEW BEST TIME"
1 ;"NEW BEST SCORE"
1 ;"N = left":
1 ;"Maths Drill":
1 ;"MACHINE CODE":
1 ;"M = right":
1 ;"LIVES:";lives
1 ;"L = down"
1 ;"INSTRUCTIONS":
1 ;"Honeyfold Software Ltd,"
1 ;"High Street,"
1 ;"HIT SPACE BAR TO CONTINUE"
1 ;"HIT SPACE BAR FOR ANOTHER GAME"
1 ;"HIT ANY KEY TO CONTINUE"
1 ;"HIT ANY KEY FOR NEXT ATTEMPT"
1 ;"HIT ANY KEY FOR ANOTHER TRY"
1 ;"Give adventure a name or STOP";
1 ;"GET READY"
1 ;"DR WATSON":
1 ;"Computer Learning series"
1 ;"CONGRATULATIONS ";a$;"!"
1 ;"Bath Place,"
1 ;"BEST REACTION TIME";
1 ;"BARNET,"
1 ;"BALLTRAP"
1 ;"AVOID YOUR OPPONENTS LINES"
1 ;"AVOID ALL LINES":
1 ;"ATTEMPT";turn;":";
1 ;"A = down":
1 ;"A = down"
1 ;">....CIRCLE x,y";
1 ;":INPUT r$:SAVE b$"
1 ;"9.BLOCKADE2"
1 ;"8.BLOCKADE"
1 ;"5.BARCHART"
1 ;"4.REACTION"
1 ;"3.HANGMAN"
1 ;"2.ETCHA"
1 ;"12.ADVENTURE GAMES"
1 ;"11.PIECHART"
1 ;"10.MUSIC"
1 ;"10.COMPOSATUNE"
1 ;"1.BODMAS":
1 ;"**HIT ANY KEY TO RESTART**"
1 ;" Start with a RUN."
1 ;" Beginnners BASIC for SPECTRUM"
1 ;" <ENTER>":
1 ;" Beginners BASIC for SPECTRUM"
1 ;" ":
1 ;" ":
1 ;" "
1 ;" "
1 400 for AUTO RUN.
1 3 3 3
1 100 - prob %";prob
1 --- A
1 ,"hangman","reaction","barchart","wall","balltrap","blockade","blockade2","music","piechart","adventure games","spacewar"
1 )*width-width/2
1 (scalefactor*v(i))
1 (r,c+cinc)/8
1 (r,c+cinc)-8
1 (r+rinc,c+cinc)/8
1 (r+rinc,c+cinc)-8
1 (r+rinc,c)/8
1 (r+rinc,c)-8
1 "your friends not to cross your"
1 "your copy of the book now."
1 "your SPECTRUM and shows you how"
1 "with you or shoot you. You":
1 "with this program.It is"
1 "where you press 'A' and 'Z' to":
1 "vocab#";k;" of ";nv
1 "user-defined graphics features"
1 "tune and then to play it back"
1 "too long _ 16 characters max.":
1 "told to 'go'":
1 "to time things."
1 "to program in BASIC."
1 "to produce a complete music"
1 "to produce a colourful ball-game"
1 "three letter abbreviation";v$(k):
1 "this is for countdown #";k
1 "these are described under the"
1 "the clock that is built into"
1 "the authors of this book and":
1 "the SPECTRUM's sound facility"
1 "start location?";cl
1 "start co-ordinate down ";y
1 "start co-ordinate across ";x
1 "spectrum","computer","key","sinclair","keyboard","byte","space","car","hangman","adventure","wall","table","tape","garden"
1 "space game written in BASIC."
1 "remember that 7,";k;" is usual";"first logic.":
1 "quickly you can respond when"
1 "program,please check the next"
1 "program from chapter 6.See how"
1 "program developed in chapter 3"
1 "program 9.2 on page 9-8 and"
1 "program 8.16(g) on page 8-34"
1 "program 8.15(d)"
1 "program .It is listed as"
1 "please make these changes in"
1 "path.It is developed in part 3"
1 "page as there are a few"
1 "page 7-7."
1 "page 4-18.Some further DATA has"
1 "page 2-21"
1 "on a 48K machine..........3"
1 "on a 16K or 48K machine...1"
1 "on a 16K machine..........2"
1 "of game that is very difficult":
1 "of chapter 8 and listed as "
1 "octave?";oct:
1 "number to countdown from?";count
1 "number of vocabulary?";nv
1 "number of locations?";nl
1 "number of items";ni
1 "number of items initially carried?";ic
1 "number of flags?";nflags:
1 "number of countdowns?";nd
1 "number of command enties?";nc
1 "number of automatics?";na
1 "name categories ? ";r$
1 "must get them first."
1 "must be in the range of 0 to 8":
1 "must be between '0' and '255' ":
1 "must be between '0' and '175' ":
1 "move up and down.":
1 "maximum number of items to be carried?";max
1 "long you can last without"
1 "logic #";
1 "location description?";r$
1 "location #";k;" of ";nl
1 "listed in your book(page 9-8)"
1 "listed as program 10.2,page 10-9"
1 "listed as PROGRAM 2.9,page 2-26."
1 "like all the Dr Watson series":
1 "item name ?";r$
1 "item moveable (y/n)";r$
1 "item location(or 255 if carried)";"or 0 if in holding location)";il
1 "item #";k;" of ";ni
1 "is to program such games in"
1 "integer value
1 "including a full feature monitor";"written in machine code."
1 "in the Dr Watson Series that":
1 "hangman game developed in"
1 "give adventure a name or STOP"
1 "further instructions have been"
1 "from chapter 7,listed on"
1 "for SPECTRUM.'When in machine"
1 "following headings."
1 "exits in order n-s-e-w-u-d"
1 "exercises as described on"
1 "enjoyment. Try it and see !":
1 "develops this game in machine":
1 "developed in the companion book"
1 "developed in part 3 of chapter 8"
1 "developed in chapter 8.":
1 "developed in chapter 2,and"
1 "developed in chapter 10 and"
1 "data you wish with this program"
1 "crossing your own wall.It is"
1 "countdown #";k;" of ";nd
1 "contact the distributors:"
1 "complete adventure suite and"
1 "command code verb#";k;" of ";nc;" ";
1 "command code noun#";k;" of ";nc;" ";
1 "comes with a tape of examples":
1 "code,of course it RUNs much faster."
1 "code and explains much else as"
1 "chapter 4 and listed on"
1 "category ";k;" of ";nc
1 "c","c","c#","d@","d","d","d#","e@","e","e","f","f","f#","g@","g","g","g#","a@","a","a","a#","b@","b","b"
1 "breakout type game that is"
1 "bodmas","etcha"
1 "blockade allows you to challenge"
1 "been added."
1 "automatic #";k;" of ";na
1 "and listed on page 3-15.Some"
1 "ammendments to the program"
1 "allows you to enter your own"
1 "added to make it clearer to RUN"
1 "action #";
1 "You scored ";number correct;" out of ten."
1 "You press 'F' to fire your"
1 "Wrong. Correct value ";correct
1 "Work out ";f$
1 "Well done! You've cracked it!":
1 "Welcome to test Adventure","
1 "Value of category ? ";vc
1 "Use GO TO 400, not RUN !":
1 "Trap the ball by building walls to bounce it into the net.It is listed on page 8-28 as":
1 "To create and RUN an adventure game on a 16K SPECTRUM.":
1 "To create and RUN an Adventure game on a 48K SPECTRUM."
1 "To RUN this,type:"
1 "To RUN an adventure game on a 16K or48K SPECTRUM."
1 "Three programs make up the"
1 "This two player version of"
1 "This tape contains the following":
1 "This program uses the SPECTRUM's"
1 "This is the version of the "
1 "This is the etcha-sketcha"
1 "This is the bodmas tester"
1 "This is an example of the sort":
1 "This game is an example of a"
1 "These lines are listed on page 11-30."
1 "There's something there!":
1 "There is a book available":
1 "The program introduces you to"
1 "The game is too slow for much":
1 "The book is called:":
1 "The aliens will try to collide":
1 "Test your reactions with this"
1 "Start the loader vith GO TO 9000and the adventure with GO TO 400"
1 "Standfast House":
1 "Select number and press <RETURN>?";z
1 "SCORE=";score
1 "Ready tape-enter any value.":
1 "RUN the adventure game"
1 "Program will not run unless a","database is first created using","loader. Then merge the database.";"Start with GO TO 400.":
1 "Program changes shown flashing"
1 "Plot out a bar chart of whatever"
1 "Out of time.":
1 "One way round this problem":
1 "Numeric value ? ";v(i)
1 "Number of categories ? ";number
1 "Number of categories ? ";nc
1 "Now reLOAD program to proceed.":
1 "Note?";a$:
1 "Note says - You must find","treasure.-":
1 "NAME OF PLAYER 2";q$
1 "NAME OF PLAYER 1";p$
1 "Length?";dur
1 "LINES 130 )"
1 "LINE 90......7*(oct";
1 "LINE 210.....DRAW 7,";
1 "LINE 160.....DRAW -3,";
1 "LINE 105.....IF a$(";
1 "It provides maths drill"
1 "It is included to show what is"
1 "It is a simple 'arcade' game":
1 "I'll think of a word.You must guess this letter by letter. You'll get ten goes and if you don't guess it,hard luck!"
1 "Honeyfold Software Ltd":
1 "High Street":
1 "Hairpin snaps!":
1 "For more details of this book,"
1 "For further details please write";"to:":
1 "Error- negative entry.":
1 "Enter number now-";a:
1 "Door creaks open...":
1 "Demolish the wall in this"
1 "DR WATSON'S Beginners Assembly for the SPECTRUM"
1 "Correct.":
1 "Chapter 9 tells you how to use"
1 "Change your data into pie charts"
1 "Category title ? ";c$(i)
1 "Cake was poisoned...":
1 "COLOUR CODE FOR";q$;"?"
1 "COLOUR CODE FOR";p$;"?"
1 "Build your blockade and see how"
1 "Before you LOAD and RUN this"
1 "Bath Place":
1 "Barchart title ? ";t$
1 "And now, on with the game...":
1 "AND 140 )"
1 "9970 GO TO 400:REM not on 16K machines."
1 "9960 PRINT";
1 "9950 INPUT b$"
1 "9940 PRINT ";
1 "(vi) Start the program with a: GO TO 400":
1 "(v) SAVE program on tape with a: SAVE ";
1 "(iv) To SAVE this along with your database,add these lines:":
1 "(iii) SAVE this with a":
1 "(ii) Use this program to create a database as shown in chapter11,page 11-30."
1 "(ii) Start the game with a:":
1 "(i) LOAD the interpreter with a: LOAD ";
1 "(i) LOAD the adventure program with a:"
1 "(i) LOAD and RUN the loader program with a:"
1 "'Beginners Assembly language"
1 " turns left.":
1 " PRESS ANY KEY TO COMMENCE GAME"
1 " It was written by one of":
1 " ";action
1 " RUN <ENTER>"
1 " LOAD";
1 " LOAD ";
1 " GO TO 400":
1 " ---------"
1 " SAVE ";
1 T P Mervyn & D S Neilson 1982.":
1 M.D.Holmes 1983
1 COPYRIGHT P.HOLMES 1983
1 1983 M.D.Holmes
1 D